PC World Interactive 7

home *** CD-ROM | disk | FTP | other *** search

/ PC World Interactive 7 / PC World Interactive 7.iso / share / internet / DOMPRO11 / DOMAIN.exe / 0 / RCDATA / TFORM1 / TFORM1.txt < prev

Wrap

Text File | 1998-02-01 | 57.9 KB | 2,014 lines

object Form1: TForm1 Left = 99 Top = 76 ActiveControl = EditDomName BorderIcons = [biSystemMenu, biMinimize] BorderStyle = bsToolWindow Caption = 'DomainPro 1.01' ClientHeight = 341 ClientWidth = 595 Font.Color = clBlack Font.Height = -11 Font.Name = 'Arial' Font.Style = [] Icon.Data = {<image000.ico>} Menu = MainMenu2 Position = poScreenCenter ShowHint = True OnClose = FormClose OnCreate = FormCreate OnMouseMove = FormMouseMove OnPaint = FormPaint OnShow = FormShow PixelsPerInch = 96 TextHeight = 14 object animtext: TEdit Left = 240 Top = 90 Width = 353 Height = 19 Cursor = crArrow AutoSize = False Color = clBtnFace Ctl3D = False Font.Color = clBlack Font.Height = -11 Font.Name = 'Arial' Font.Style = [] ParentCtl3D = False ParentFont = False ReadOnly = True TabOrder = 2 Text = 'Our first Paying Member just listed WIN-95.COM for Sale' Visible = False OnClick = animtextClick end object PageControl1: TPageControl Left = 0 Top = 48 Width = 593 Height = 273 ActivePage = TabWhois Font.Color = clBlack Font.Height = -11 Font.Name = 'Arial' Font.Style = [fsBold] ParentFont = False TabHeight = 20 TabOrder = 0 OnChange = PageControl1Change object TabWhois: TTabSheet Caption = 'Domain Manager' Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False OnMouseMove = TabWhoisMouseMove object Label6: TLabel Left = 8 Top = 0 Width = 64 Height = 15 Caption = 'AVAILABLE' Font.Color = clBlack Font.Height = -12 Font.Name = 'Arial' Font.Style = [fsBold] ParentFont = False end object Label2: TLabel Left = 408 Top = 0 Width = 71 Height = 15 Caption = 'REGISTERED' Font.Color = clBlack Font.Height = -12 Font.Name = 'Arial' Font.Style = [fsBold] ParentFont = False end object SpeedRegister: TSpeedButton Left = 8 Top = 216 Width = 169 Height = 21 Caption = 'REGISTER' Enabled = False Font.Color = clBlack Font.Height = -11 Font.Name = 'Arial' Font.Style = [] Glyph.Data = { 78010000424D7801000000000000760000002800000020000000100000000100 04000000000000000000120B0000120B00000000000000000000000000000000 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333 333333333333FF3333333333333C0C333333333333F777F3333333333CC0F0C3 333333333777377F33333333C30F0F0C333333337F737377F333333C00FFF0F0 C33333F7773337377F333CC0FFFFFF0F0C3337773F33337377F3C30F0FFFFFF0 F0C37F7373F33337377F00FFF0FFFFFF0F0C7733373F333373770FFFFF0FFFFF F0F073F33373F333373730FFFFF0FFFFFF03373F33373F333F73330FFFFF0FFF 00333373F33373FF77333330FFFFF000333333373F333777333333330FFF0333 3333333373FF7333333333333000333333333333377733333333333333333333 33333333333333333333333333333333333333333333333333330000} NumGlyphs = 2 ParentFont = False OnClick = SpeedRegisterClick end object SpeedBuy: TSpeedButton Left = 408 Top = 137 Width = 121 Height = 21 Caption = 'DOMAIN LISTED ?' Enabled = False Font.Color = clBlack Font.Height = -11 Font.Name = 'Arial' Font.Style = [] Glyph.Data = { 78010000424D7801000000000000760000002800000020000000100000000100 04000000000000000000120B0000120B00000000000000000000000000000000 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00337000000000 73333337777777773F333308888888880333337F3F3F3FFF7F33330808089998 0333337F737377737F333308888888880333337F3F3F3F3F7F33330808080808 0333337F737373737F333308888888880333337F3F3F3F3F7F33330808080808 0333337F737373737F333308888888880333337F3F3F3F3F7F33330808080808 0333337F737373737F333308888888880333337F3FFFFFFF7F33330800000008 0333337F7777777F7F333308000E0E080333337F7FFFFF7F7F33330800000008 0333337F777777737F333308888888880333337F333333337F33330888888888 03333373FFFFFFFF7333337000000000733333377777777733330000} NumGlyphs = 2 ParentFont = False Visible = False OnClick = SpeedBuyClick end object SpeedButton4: TSpeedButton Left = 522 Top = 0 Width = 28 Height = 17 Caption = 'Sort' Font.Color = clBlack Font.Height = -11 Font.Name = 'Arial' Font.Style = [] ParentFont = False OnClick = SortbyName2Click end object SpeedButton5: TSpeedButton Left = 550 Top = 0 Width = 31 Height = 17 Caption = 'Clear' Font.Color = clBlack Font.Height = -11 Font.Name = 'Arial' Font.Style = [] ParentFont = False OnClick = Clear2Click end object SpeedButton11: TSpeedButton Left = 88 Top = 0 Width = 28 Height = 17 Hint = 'Sort by Name' Caption = 'Sort' Font.Color = clBlack Font.Height = -11 Font.Name = 'Arial' Font.Style = [] ParentFont = False OnClick = SortbyName1Click end object SpeedButton12: TSpeedButton Left = 117 Top = 0 Width = 30 Height = 17 Hint = 'Delete All' Caption = 'Clear' Font.Color = clBlack Font.Height = -11 Font.Name = 'Arial' Font.Style = [] ParentFont = False OnClick = Clear1Click end object buttonfilter: TSpeedButton Left = 148 Top = 0 Width = 29 Height = 17 Hint = 'Filter' Caption = 'ALL' Font.Color = clBlack Font.Height = -11 Font.Name = 'Arial' Font.Style = [] ParentFont = False OnClick = buttonfilterClick end object buttonlist: TSpeedButton Left = 520 Top = 89 Width = 53 Height = 21 Caption = 'LIST' Enabled = False Font.Color = clBlack Font.Height = -11 Font.Name = 'Arial' Font.Style = [] Glyph.Data = { 78010000424D7801000000000000760000002800000020000000100000000100 04000000000000000000120B0000120B00000000000000000000000000000000 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333300333 33333333333773FF333333333330F0033333333333373773FF333333330FFFF0 03333333337F333773FF3333330FFFFFF003333333733FF33773333330FF00FF FF80333337F3773F3337333330FFFF0FFFF03FFFF7FFF3733F3700000000FFFF 0FF0777777773FF373370000000000FFFFF07FFFFFF377FFF3370CCCCC000000 FF037777773337773F7300CCC000003300307F77733337F37737000C00000033 33307F373333F7F333370000007B703333307FFFF337F7F33337099900BBB033 33307777F37777FF33370999007B700333037777F3373773FF73099900000030 00337777FFFFF7F77733000000000033333377777777773333330000} NumGlyphs = 2 ParentFont = False Visible = False OnClick = buttonlistClick end object ShapeG: TShape Left = 220 Top = 54 Width = 173 Height = 17 Pen.Color = 8454016 Shape = stRoundRect Visible = False end object ShapeY: TShape Left = 220 Top = 32 Width = 173 Height = 17 Pen.Color = clYellow Shape = stRoundRect end object ShapeR: TShape Left = 220 Top = 9 Width = 173 Height = 17 Pen.Color = clRed Shape = stRoundRect Visible = False end object LabelRed: TLabel Left = 231 Top = 11 Width = 150 Height = 13 Caption = 'DOMAIN NAME REGISTERED' Color = clBtnFace Enabled = False Font.Color = clRed Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentColor = False ParentFont = False Transparent = True end object LabelYellow: TLabel Left = 233 Top = 34 Width = 125 Height = 13 Caption = 'PLEASE ENTER A NAME' Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False Transparent = True end object LabelGreen: TLabel Left = 233 Top = 56 Width = 137 Height = 13 Caption = 'DOMAIN NAME AVAILABLE' Enabled = False Font.Color = clGreen Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False Transparent = True end object LightY: TImage Left = 192 Top = 6 Width = 25 Height = 65 Picture.Data = {<image001.bmp>} end object LightR: TImage Left = 192 Top = 6 Width = 25 Height = 65 Picture.Data = {<image002.bmp>} Visible = False end object LightG: TImage Left = 192 Top = 6 Width = 25 Height = 65 Picture.Data = {<image003.bmp>} Visible = False end object SpeedButton10: TSpeedButton Left = 480 Top = 0 Width = 43 Height = 17 Caption = 'Browse' Font.Color = clBlack Font.Height = -11 Font.Name = 'Arial' Font.Style = [] ParentFont = False OnClick = BrowserWebsite1Click end object Sockets4: TSockets Left = 360 Top = 88 Width = 32 Height = 32 MaximumReceiveLength = 8192 IPAddr = '127.0.0.1' Port = '8754' OnErrorOccurred = Sockets4ErrorOccurred end object Sockets3: TSockets Left = 232 Top = 96 Width = 32 Height = 32 MaximumReceiveLength = 8192 IPAddr = 'rs2.internic.net' Port = 'whois' Timeout = 45 OnDataAvailable = Sockets3DataAvailable OnSessionConnected = Sockets3SessionConnected end object Sockets2: TSockets Left = 280 Top = 88 Width = 32 Height = 32 MaximumReceiveLength = 8192 NonBlocking = False end object Sockets1: TSockets Left = 320 Top = 96 Width = 32 Height = 32 MaximumReceiveLength = 8192 IPAddr = 'internix.net' Port = '5000' Timeout = 10 OnDataAvailable = Sockets1DataAvailable OnSessionConnected = Sockets1SessionConnected OnErrorOccurred = Sockets1ErrorOccurred end object ListBox1: TListBox Left = 8 Top = 24 Width = 169 Height = 185 Hint = 'DOMAIN NAME AVAILABLE FOR REGISTER' Font.Color = clBlack Font.Height = -11 Font.Name = 'Arial' Font.Style = [] ItemHeight = 14 ParentFont = False PopupMenu = PopupMenu1 TabOrder = 0 OnClick = ListBox1Click OnDblClick = SpeedRegisterClick end object ListBox2: TListBox Left = 408 Top = 24 Width = 172 Height = 217 Hint = 'DOMAIN NAME ALREADY REGISTERED' Font.Color = clBlack Font.Height = -11 Font.Name = 'Arial' Font.Style = [] ItemHeight = 14 ParentFont = False PopupMenu = PopupMenu2 TabOrder = 1 OnClick = ListBox2Click OnDblClick = Detail1Click OnExit = ListBox2Exit end object SearchList: TListBox Left = 504 Top = 64 Width = 25 Height = 33 ItemHeight = 13 TabOrder = 2 Visible = False end object PageControl3: TPageControl Left = 184 Top = 76 Width = 217 Height = 165 ActivePage = TabSheet5 TabOrder = 4 object TabSheet5: TTabSheet Caption = 'TabSheet5' TabVisible = False object LabelCo: TLabel Left = 2 Top = 4 Width = 102 Height = 14 Caption = 'Domain Registered to' Font.Color = clBlack Font.Height = -11 Font.Name = 'Arial' Font.Style = [] ParentFont = False end object LabelOwner: TLabel Left = 2 Top = 42 Width = 67 Height = 14 Caption = 'Contact Name' Font.Color = clBlack Font.Height = -11 Font.Name = 'Arial' Font.Style = [] ParentFont = False end object LabelEmail: TLabel Left = 2 Top = 80 Width = 64 Height = 14 Caption = 'Contact Email' Font.Color = clBlack Font.Height = -11 Font.Name = 'Arial' Font.Style = [] ParentFont = False end object Label8: TLabel Left = 4 Top = 116 Width = 51 Height = 14 Caption = 'PRICE US$' Font.Color = clBlack Font.Height = -11 Font.Name = 'Arial' Font.Style = [] ParentFont = False Visible = False end object SpeedAgent: TSpeedButton Left = 152 Top = 128 Width = 41 Height = 17 Caption = 'Broker' Enabled = False Visible = False OnClick = SpeedAgentClick end object SpeedButton8: TSpeedButton Left = 70 Top = 128 Width = 131 Height = 21 Hint = 'Available on for Domain Name listed at InterNIX' Caption = 'CONTACT OWNER' Font.Color = clBlack Font.Height = -9 Font.Name = 'Arial' Font.Style = [] Glyph.Data = { 56060000424D560600000000000036040000280000001E000000110000000100 08000000000020020000880B0000880B00000000000000000000000000003300 00006600000099000000CC000000FF0000000033000033330000663300009933 0000CC330000FF33000000660000336600006666000099660000CC660000FF66 000000990000339900006699000099990000CC990000FF99000000CC000033CC 000066CC000099CC0000CCCC0000FFCC000000FF000033FF000066FF000099FF 0000CCFF0000FFFF000000003300330033006600330099003300CC003300FF00 330000333300333333006633330099333300CC333300FF333300006633003366 33006666330099663300CC663300FF6633000099330033993300669933009999 3300CC993300FF99330000CC330033CC330066CC330099CC3300CCCC3300FFCC 330000FF330033FF330066FF330099FF3300CCFF3300FFFF3300000066003300 66006600660099006600CC006600FF0066000033660033336600663366009933 6600CC336600FF33660000666600336666006666660099666600CC666600FF66 660000996600339966006699660099996600CC996600FF99660000CC660033CC 660066CC660099CC6600CCCC6600FFCC660000FF660033FF660066FF660099FF 6600CCFF6600FFFF660000009900330099006600990099009900CC009900FF00 990000339900333399006633990099339900CC339900FF339900006699003366 99006666990099669900CC669900FF6699000099990033999900669999009999 9900CC999900FF99990000CC990033CC990066CC990099CC9900CCCC9900FFCC 990000FF990033FF990066FF990099FF9900CCFF9900FFFF99000000CC003300 CC006600CC009900CC00CC00CC00FF00CC000033CC003333CC006633CC009933 CC00CC33CC00FF33CC000066CC003366CC006666CC009966CC00CC66CC00FF66 CC000099CC003399CC006699CC009999CC00CC99CC00FF99CC0000CCCC0033CC CC0066CCCC0099CCCC00CCCCCC00FFCCCC0000FFCC0033FFCC0066FFCC0099FF CC00CCFFCC00FFFFCC000000FF003300FF006600FF009900FF00CC00FF00FF00 FF000033FF003333FF006633FF009933FF00CC33FF00FF33FF000066FF003366 FF006666FF009966FF00CC66FF00FF66FF000099FF003399FF006699FF009999 FF00CC99FF00FF99FF0000CCFF0033CCFF0066CCFF0099CCFF00CCCCFF00FFCC FF0000FFFF0033FFFF0066FFFF0099FFFF00CCFFFF00FFFFFF00000000002828 28005050500078787800A0A0A000C8C8C800F0F0F000FFFFFF00FFFFFF00FFFF FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00D7D7D7D7D7D7 D7D7D7D7D7D7D7D7D7D7D7D7D7D7D7D7D7D7D7D7D7D7D7D70000D7DB00000000 0000000000000000000000000000000000000000000000D70000D7DBDBD7D7D7 D7D7D7D7D7D7D7D7D7D7D7D7D7D7D7D7D7D7D7D7D7DB00D70000D7DBACDBD7D7 D7D7D7D7D7D7D7D7D7D7D7D7D7D7D7D7D7D7D7D7DBAC00D70000D7DBD7ACDBD7 D7D7D7D7D7D7D7D7D7D7D7D7D7D7D7D7D7D7D7DBACD700D70000D7DBD7D7ACDB D7D7D7D7D7DB000000000000DBACD7D7D7D7DBACD7D700D70000D7DBD7D7D7AC DBD7D7D700ACD7D7D7D7D7D7AC00ACD7D7DBACD7D7D700D70000D7DBD7D7D7D7 ACDBD700D7D7D7D7D7D7D7D7D7D700ACDBACD7D7D7D700D70000D7DBD7D7D7D7 D7AC00D7D7D7D7D7D7D7D7D7D7D7D700ACD7D7D7D7D700D70000D7DBD7D7D7D7 D700D7D7D7D7D7D7D7D7D7D7D7D7D7D700ACD7D7D7D700D70000D7DBD7D7D7D7 00D7D7D7D7D7D7D7D7D7D7D7D7D7D7D7D700ACD7D7D700D70000D7DBD7D7D700 D7D7D7D7D7D7D7D7D7D7D7D7D7D7D7D7D7D700ACD7D700D70000D7DBD7D700D7 D7D7D7D7D7D7D7D7D7D7D7D7D7D7D7D7D7D7D700ACD700D70000D7DBD700D7D7 D7D7D7D7D7D7D7D7D7D7D7D7D7D7D7D7D7D7D7D700AC00D70000D7DB00D7D7D7 D7D7D7D7D7D7D7D7D7D7D7D7D7D7D7D7D7D7D7D7D70000D70000D7DBDBDBDBDB DBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDB00D70000D7D7D7D7D7D7 D7D7D7D7D7D7D7D7D7D7D7D7D7D7D7D7D7D7D7D7D7D7D7D70000} ParentFont = False OnClick = SpeedButton8Click end object EditCompany: TEdit Left = 2 Top = 16 Width = 199 Height = 22 Font.Color = clBlack Font.Height = -11 Font.Name = 'Arial' Font.Style = [] ParentFont = False ReadOnly = True TabOrder = 0 end object EditOwner: TEdit Left = 2 Top = 54 Width = 199 Height = 22 Font.Color = clBlack Font.Height = -11 Font.Name = 'Arial' Font.Style = [] ParentFont = False ReadOnly = True TabOrder = 1 end object EditEmail: TEdit Left = 2 Top = 92 Width = 199 Height = 22 Font.Color = clBlack Font.Height = -11 Font.Name = 'Arial' Font.Style = [] ParentFont = False ReadOnly = True TabOrder = 2 end object EditPrice: TEdit Left = 4 Top = 128 Width = 53 Height = 22 Font.Color = clBlack Font.Height = -11 Font.Name = 'Arial' Font.Style = [] ParentFont = False ReadOnly = True TabOrder = 3 Visible = False end end object TabSheet6: TTabSheet Caption = 'TabSheet6' TabVisible = False object Label10: TLabel Left = 8 Top = 8 Width = 53 Height = 13 Caption = 'Agent URL' end object Label11: TLabel Left = 8 Top = 48 Width = 56 Height = 13 Caption = 'Agent Email' end object SpeedAgentBack: TSpeedButton Left = 8 Top = 120 Width = 41 Height = 17 Caption = 'Back' OnClick = SpeedAgentBackClick end object EditAgentURL: TEdit Left = 8 Top = 24 Width = 169 Height = 21 ReadOnly = True TabOrder = 0 end object EditAgentEmail: TEdit Left = 8 Top = 64 Width = 169 Height = 21 ReadOnly = True TabOrder = 1 end end end object Listadv: TListBox Left = 432 Top = 56 Width = 33 Height = 33 ItemHeight = 13 TabOrder = 5 Visible = False end object ftplst: TListBox Left = 424 Top = 72 Width = 121 Height = 97 ItemHeight = 13 TabOrder = 7 Visible = False end object ToSell: TListBox Left = 32 Top = 72 Width = 81 Height = 41 ItemHeight = 13 Sorted = True TabOrder = 8 Visible = False end object strava: TListBox Left = 40 Top = 136 Width = 33 Height = 41 ItemHeight = 13 TabOrder = 10 Visible = False end end object TabSheet1: TTabSheet Caption = 'Domain Information' Font.Color = clBlack Font.Height = -11 Font.Name = 'Arial' Font.Style = [fsBold] ParentFont = False OnMouseMove = TabSheet1MouseMove object Label3: TLabel Left = 168 Top = 8 Width = 141 Height = 16 Caption = 'DETAIL INFORMATION' Font.Color = clBlack Font.Height = -13 Font.Name = 'Arial' Font.Style = [fsBold] ParentFont = False end object Label4: TLabel Left = 8 Top = 8 Width = 82 Height = 16 Caption = 'REGISTERED' Font.Color = clBlack Font.Height = -13 Font.Name = 'Arial' Font.Style = [fsBold] ParentFont = False end object SpeedButton13: TSpeedButton Left = 312 Top = 8 Width = 33 Height = 17 Caption = 'Print' Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] NumGlyphs = 2 ParentFont = False OnClick = Print1Click end object SpeedButton14: TSpeedButton Left = 96 Top = 8 Width = 33 Height = 17 Caption = 'Clear' Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False OnClick = Clear3Click end object PrintDetail: TLabel Left = 336 Top = 0 Width = 60 Height = 16 Caption = 'PrintDetail' Font.Color = clBlack Font.Height = -13 Font.Name = 'Arial' Font.Style = [] ParentFont = False Visible = False end object ListBox3: TListBox Left = 8 Top = 24 Width = 153 Height = 217 Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ItemHeight = 13 ParentFont = False PopupMenu = PopupMenu3 Sorted = True TabOrder = 1 OnClick = ListBox3Click end object Memo1: TMemo Left = 164 Top = 24 Width = 393 Height = 217 Font.Color = clBlack Font.Height = -11 Font.Name = 'Arial' Font.Style = [] ParentFont = False PopupMenu = PopupMenu5 ReadOnly = True ScrollBars = ssVertical TabOrder = 0 end end object TabSheet2: TTabSheet Caption = 'Advanced Search by Company' Font.Color = clBlack Font.Height = -11 Font.Name = 'Arial' Font.Style = [fsBold] ParentFont = False OnEnter = TabSheet2Enter object SpeedButton1: TSpeedButton Left = 208 Top = 8 Width = 65 Height = 21 Hint = 'Start Search' Caption = 'Search' Font.Color = clBlack Font.Height = -11 Font.Name = 'Arial' Font.Style = [fsBold] ParentFont = False OnClick = SpeedButton1Click end object buttonload: TSpeedButton Left = 8 Top = 32 Width = 49 Height = 17 Caption = 'Load' Enabled = False Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False OnClick = buttonloadClick end object buttondel: TSpeedButton Left = 56 Top = 32 Width = 49 Height = 17 Caption = 'Delete' Enabled = False Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False OnClick = buttondelClick end object Label16: TLabel Left = 176 Top = 32 Width = 29 Height = 14 Caption = 'Show' Font.Color = clBlack Font.Height = -11 Font.Name = 'Arial' Font.Style = [] ParentFont = False end object buttonedit: TSpeedButton Left = 104 Top = 32 Width = 49 Height = 17 Caption = 'Editor' Enabled = False Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False OnClick = buttoneditClick end object MyDomains: TListBox Left = 8 Top = 50 Width = 265 Height = 193 Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ItemHeight = 13 ParentFont = False PopupMenu = PopupMenu4 Sorted = True TabOrder = 0 OnClick = MyDomainsClick end object companyname: TComboBox Left = 8 Top = 8 Width = 201 Height = 21 Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ItemHeight = 13 ParentFont = False Sorted = True TabOrder = 1 Text = 'ENTER OR SELECT A COMPANY' OnChange = TabSheet2Enter OnClick = TabSheet2Enter OnKeyDown = companynameKeyDown end object ComboBox1: TComboBox Left = 208 Top = 32 Width = 65 Height = 19 Hint = 'Filter' Font.Color = clBlack Font.Height = -9 Font.Name = 'Small Fonts' Font.Style = [] ItemHeight = 11 Items.Strings = ( 'ALL' 'COM' 'NET' 'ORG') ParentFont = False TabOrder = 2 Text = 'ALL' OnClick = ComboBox1Click end end object TabSheet7: TTabSheet Caption = 'Search InterNIX by keyword' Font.Color = clBlack Font.Height = -11 Font.Name = 'Arial' Font.Style = [] ParentFont = False TabVisible = False object SpeedButton18: TSpeedButton Left = 280 Top = 8 Width = 121 Height = 25 Caption = 'SEARCH' Glyph.Data = { 78010000424D7801000000000000760000002800000020000000100000000100 04000000000000000000120B0000120B00000000000000000000000000000000 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00555555555555 5000555555555555577755555555555550B0555555555555F7F7555555555550 00B05555555555577757555555555550B3B05555555555F7F557555555555000 3B0555555555577755755555555500B3B0555555555577555755555555550B3B 055555FFFF5F7F5575555700050003B05555577775777557555570BBB00B3B05 555577555775557555550BBBBBB3B05555557F555555575555550BBBBBBB0555 55557F55FF557F5555550BB003BB075555557F577F5575F5555577B003BBB055 555575F7755557F5555550BB33BBB0555555575F555557F555555507BBBB0755 55555575FFFF77555555555700007555555555577777755555550000} NumGlyphs = 2 OnClick = SpeedButton18Click end object Label12: TLabel Left = 8 Top = 8 Width = 77 Height = 14 Caption = 'Enter a Purpose' end object Label14: TLabel Left = 408 Top = 96 Width = 24 Height = 14 Caption = 'Price' end object Labeloffer: TLabel Left = 408 Top = 176 Width = 26 Height = 14 Caption = 'Offer' Enabled = False end object keysendmail: TSpeedButton Left = 408 Top = 208 Width = 161 Height = 25 Hint = 'Available on for Domain Name listed at InterNIX' Caption = ' Contact Owner' Enabled = False Font.Color = clBlack Font.Height = -11 Font.Name = 'Arial' Font.Style = [] Glyph.Data = { 78010000424D7801000000000000760000002800000020000000100000000100 04000000000000000000120B0000120B00000000000000000000000000000000 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333 3333333333333333333333333333333333333FFFFFFFFFFFFFFF000000000000 000077777777777777770FFFFFFFFFFFFFF07F3333FFF33333370FFFF777FFFF FFF07F333777333333370FFFFFFFFFFFFFF07F3333FFFFFF33370FFFF777777F FFF07F33377777733FF70FFFFFFFFFFF99907F3FFF33333377770F777FFFFFFF 9CA07F77733333337F370FFFFFFFFFFF9A907FFFFFFFFFFF7FF7000000000000 0000777777777777777733333333333333333333333333333333333333333333 3333333333333333333333333333333333333333333333333333333333333333 33333333333333333333333333333333333333333333333333330000} NumGlyphs = 2 ParentFont = False OnClick = keysendmailClick end object SocketKey: TSockets Left = 456 Top = 0 Width = 32 Height = 32 MaximumReceiveLength = 8192 IPAddr = 'internix.net' Port = '4999' OnDataAvailable = SocketKeyDataAvailable OnSessionConnected = SocketKeySessionConnected OnErrorOccurred = SocketKeyErrorOccurred end object editkey: TEdit Left = 96 Top = 8 Width = 185 Height = 22 TabOrder = 0 Text = 'Shopping' OnKeyDown = editkeyKeyDown end object KeyGrid: TStringGrid Left = 12 Top = 36 Width = 389 Height = 197 ColCount = 3 DefaultColWidth = 55 DefaultRowHeight = 15 FixedCols = 0 RowCount = 40 Options = [goFixedVertLine, goFixedHorzLine, goVertLine, goHorzLine, goRangeSelect, goColSizing] TabOrder = 1 OnClick = KeyGridClick ColWidths = ( 143 81 141) end object keyprice: TEdit Left = 448 Top = 96 Width = 121 Height = 22 TabStop = False ReadOnly = True TabOrder = 3 end object keyoffer: TEdit Left = 448 Top = 176 Width = 121 Height = 22 TabStop = False Enabled = False TabOrder = 4 end object RadioGroup1: TRadioGroup Left = 408 Top = 120 Width = 161 Height = 49 ItemIndex = 0 Items.Strings = ( 'I accept the price above' 'I offer the price below') TabOrder = 5 OnClick = RadioGroup1Click end object keyemail: TEdit Left = 408 Top = 64 Width = 161 Height = 22 TabStop = False ReadOnly = True TabOrder = 6 end object keydomname: TEdit Left = 408 Top = 32 Width = 161 Height = 22 TabStop = False ReadOnly = True TabOrder = 7 end end object TabSheet3: TTabSheet Caption = 'Options' object PageControl4: TPageControl Left = 0 Top = 0 Width = 305 Height = 241 ActivePage = TabSheet12 Font.Color = clBlack Font.Height = -11 Font.Name = 'Arial' Font.Style = [] ParentFont = False TabOrder = 0 object TabSheet12: TTabSheet Caption = 'Servers' object Label15: TLabel Left = 8 Top = 8 Width = 277 Height = 57 AutoSize = False Caption = 'If the domain search is slow or error occurs often. Try to selec' + 't different Whois server. All 3 servers are identical but one se' + 'rver may be more busy than others' WordWrap = True end object whichserver: TRadioGroup Left = 8 Top = 72 Width = 281 Height = 33 Caption = 'whichserver' Columns = 3 ItemIndex = 0 Items.Strings = ( 'Server 01' 'Server 02' 'Server 03') TabOrder = 0 OnClick = whichserverClick end end object TabSheet4: TTabSheet Caption = 'DOMAIN STATUS' TabVisible = False object SpeedButton3: TSpeedButton Left = 228 Top = 0 Width = 59 Height = 21 Hint = 'Start Search' Caption = 'GO' Font.Color = clBlack Font.Height = -11 Font.Name = 'Arial' Font.Style = [fsBold] ParentFont = False OnClick = SpeedButton3Click end object SpeedButton6: TSpeedButton Left = 0 Top = 192 Width = 57 Height = 17 Hint = 'Parse mail-box to get all track numbers' Caption = 'Parse' Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False Visible = False OnClick = SpeedButton6Click end object SpeedButton17: TSpeedButton Left = 0 Top = 176 Width = 57 Height = 25 Caption = 'Save' Visible = False OnClick = SpeedButton17Click end object Memo2: TMemo Left = 0 Top = 24 Width = 289 Height = 185 Lines.Strings = ( 'Memo2') ScrollBars = ssVertical TabOrder = 0 end object Edit1: TEdit Left = 0 Top = 0 Width = 221 Height = 22 TabOrder = 1 Text = 'ENTER TRACK NUMBER' OnKeyDown = Edit1KeyDown end object DomainTrackNo: TListBox Left = 64 Top = 192 Width = 265 Height = 17 ItemHeight = 14 Sorted = True TabOrder = 2 Visible = False OnClick = DomainTrackNoClick end object str: TListBox Left = 0 Top = 152 Width = 25 Height = 17 ItemHeight = 14 TabOrder = 3 Visible = False end object Edit3: TEdit Left = 64 Top = 168 Width = 185 Height = 21 Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 4 Text = 'Edit3' Visible = False end end object TabSheet8: TTabSheet Caption = 'List for Sale' TabVisible = False object Label13: TLabel Left = 224 Top = 8 Width = 56 Height = 14 Caption = 'Price (USD)' end object SpeedButton9: TSpeedButton Left = 224 Top = 48 Width = 65 Height = 17 Caption = 'ADD' OnClick = SpeedButton9Click end object SpeedButton7: TSpeedButton Left = 232 Top = 184 Width = 65 Height = 25 Caption = 'GO' Font.Color = clBlue Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False OnClick = SpeedButton7Click end object SpeedClear: TSpeedButton Left = 8 Top = 192 Width = 65 Height = 17 Caption = 'Delete All' OnClick = SpeedClearClick end object SpeedDelMyName: TSpeedButton Left = 72 Top = 192 Width = 65 Height = 17 Caption = 'Delete' OnClick = SpeedDelMyNameClick end object EditMyKeyword: TEdit Left = 8 Top = 40 Width = 209 Height = 22 Hint = 'Use Keywords to Describe Purposes of the Domain Name' TabOrder = 2 Text = 'Keyword1,Keyword2,Keyword3' end object EditMyPrice: TEdit Left = 224 Top = 24 Width = 65 Height = 22 TabOrder = 1 Text = 'EditMyPrice' end object EditMyDomname: TEdit Left = 8 Top = 8 Width = 209 Height = 22 TabOrder = 0 Text = 'MYDOMAIN.COM' end object ListMyNames: TListBox Left = 8 Top = 64 Width = 209 Height = 129 TabStop = False ItemHeight = 14 TabOrder = 3 OnClick = ListMyNamesClick end end object TabSheet11: TTabSheet Caption = 'MAIL SETUP' object Label1: TLabel Left = 8 Top = 61 Width = 63 Height = 14 Caption = 'SMTP Server' end object Label5: TLabel Left = 8 Top = 22 Width = 55 Height = 14 Caption = 'Your e-mail' end object SpeedButton15: TSpeedButton Left = 80 Top = 152 Width = 137 Height = 22 Caption = 'SAVE' Enabled = False Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False OnClick = SpeedButton15Click end object Label7: TLabel Left = 8 Top = 112 Width = 64 Height = 14 Caption = 'Default HTML' end object UserEmail: TEdit Left = 88 Top = 16 Width = 185 Height = 22 TabOrder = 0 Text = 'someone@somewhere.com' OnChange = UserEmailChange end object UserSmtp: TEdit Left = 88 Top = 59 Width = 185 Height = 22 TabOrder = 1 Text = 'mail.geocities.com' OnChange = UserEmailChange end object editdefpage: TEdit Left = 88 Top = 106 Width = 185 Height = 22 TabOrder = 2 Text = 'http://www.infoseek.com/index.htm' OnChange = UserEmailChange end end object TabSheet13: TTabSheet Caption = 'Feedback' object ButtonMail: TSpeedButton Left = 52 Top = 188 Width = 201 Height = 21 Caption = 'Technical Support' Font.Color = clBlack Font.Height = -11 Font.Name = 'Arial' Font.Style = [] Glyph.Data = { 78010000424D7801000000000000760000002800000020000000100000000100 04000000000000000000120B0000120B00000000000000000000000000000000 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333 3333333333333333333333333333333333333FFFFFFFFFFFFFFF000000000000 000077777777777777770FFFFFFFFFFFFFF07F3333FFF33333370FFFF777FFFF FFF07F333777333333370FFFFFFFFFFFFFF07F3333FFFFFF33370FFFF777777F FFF07F33377777733FF70FFFFFFFFFFF99907F3FFF33333377770F777FFFFFFF 9CA07F77733333337F370FFFFFFFFFFF9A907FFFFFFFFFFF7FF7000000000000 0000777777777777777733333333333333333333333333333333333333333333 3333333333333333333333333333333333333333333333333333333333333333 33333333333333333333333333333333333333333333333333330000} NumGlyphs = 2 ParentFont = False OnClick = ButtonMailClick end object MemoComment: TMemo Left = 8 Top = 8 Width = 281 Height = 169 Lines.Strings = ( 'Enter your questions and comments') TabOrder = 0 end end end end end object StatusBar1: TStatusBar Left = 0 Top = 322 Width = 595 Height = 19 Font.Color = clBlue Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] Panels = < item Text = 'Status' Width = 240 end item Text = 'Hint' Width = 200 end> ParentFont = False SimplePanel = False end object Panel1: TPanel Left = 0 Top = 0 Width = 595 Height = 41 Align = alTop BorderWidth = 1 BorderStyle = bsSingle TabOrder = 3 object ShapeLight: TShape Left = 4 Top = 6 Width = 189 Height = 27 Brush.Color = 8454143 Pen.Color = clMaroon Visible = False end object SpeedButton2: TSpeedButton Left = 168 Top = 6 Width = 65 Height = 23 Hint = 'Click to Start Search' Caption = '&GO' Font.Color = clBlack Font.Height = -13 Font.Name = 'Arial' Font.Style = [fsBold] Glyph.Data = { 76010000424D7601000000000000760000002800000020000000100000000100 04000000000000010000130B0000130B00000000000000000000000000000000 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333 33033333333333333F7F3333333333333000333333333333F777333333333333 000333333333333F777333333333333000333333333333F77733333333333300 033333333FFF3F777333333700073B703333333F7773F77733333307777700B3 33333377333777733333307F8F8F7033333337F333F337F3333377F8F9F8F773 3333373337F3373F3333078F898F870333337F33F7FFF37F333307F99999F703 33337F377777337F3333078F898F8703333373F337F33373333377F8F9F8F773 333337F3373337F33333307F8F8F70333333373FF333F7333333330777770333 333333773FF77333333333370007333333333333777333333333} NumGlyphs = 2 ParentFont = False OnClick = SpeedButton2Click OnMouseMove = FormMouseMove end object ButtonOption: TSpeedButton Left = 468 Top = 4 Width = 61 Height = 20 Hint = 'Toggle Fast/Normal Mode' Caption = 'Normal' Font.Color = clBlack Font.Height = -11 Font.Name = 'Arial' Font.Style = [] Glyph.Data = { 78010000424D7801000000000000760000002800000020000000100000000100 04000000000000000000120B0000120B00000000000000000000000000000000 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333 3333333333FFFFF3333333333700000733333333F777773FF3333333007F0F70 0333333773373377FF3333300FFF7FFF003333773F3333377FF33300F0FFFFF0 F00337737333F37377F33707FFFF0FFFF70737F33337F33337FF300FFFFF0FFF FF00773F3337F333377F30707FFF0FFF70707F733337F333737F300FFFF09FFF FF0077F33377F33337733707FF0F9FFFF70737FF3737F33F37F33300F0FF9FF0 F003377F7337F373773333300FFF9FFF00333377FF37F3377FF33300007F9F70 000337777FF7FF77773333703070007030733373777777737333333333330333 333333333337FF333333333333300033333333333377733333330000} NumGlyphs = 2 ParentFont = False OnClick = ButtonOptionClick end object SpeedButton16: TSpeedButton Left = 532 Top = 4 Width = 53 Height = 20 Hint = 'Hide Program' Caption = 'Hide' Glyph.Data = { 78010000424D7801000000000000760000002800000020000000100000000100 04000000000000000000120B0000120B00000000000000000000000000000000 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333300000000 0EEE333377777777777733330FF00FBFB0EE33337F37733F377733330F0BFB0B FB0E33337F73FF73337733330FF000BFBFB033337F377733333733330FFF0BFB FBF033337FFF733F333733300000BF0FBFB03FF77777F3733F37000FBFB0F0FB 0BF077733FF7F7FF7337E0FB00000000BF0077F377777777F377E0BFBFBFBFB0 F0F077F3333FFFF7F737E0FBFB0000000FF077F3337777777337E0BFBFBFBFB0 FFF077F3333FFFF73FF7E0FBFB00000F000077FF337777737777E00FBFBFB0FF 0FF07773FFFFF7337F37003000000FFF0F037737777773337F7333330FFFFFFF 003333337FFFFFFF7733333300000000033333337777777773330000} NumGlyphs = 2 OnClick = SpeedButton16Click end object buttonmin: TSpeedButton Left = 380 Top = 36 Width = 25 Height = 18 Hint = 'Minimize' Caption = '-' Font.Color = clMaroon Font.Height = -16 Font.Name = 'Arial' Font.Style = [fsBold] ParentFont = False Visible = False OnClick = buttonminClick end object SpeedButton19: TSpeedButton Left = 360 Top = 4 Width = 105 Height = 20 Hint = 'Search for a List of Domain Names' Caption = 'Search Wizard' Glyph.Data = { 78010000424D7801000000000000760000002800000020000000100000000100 04000000000000000000120B0000120B00000000000000000000000000000000 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF003FF0000000F0 000033F77777773777773FFF0CCC0FF09990333F73F37337F33733FFF0C0FFF0 99903333F7373337F337333FFF0FFFF0999033333F73FFF7FFF73333FFF000F0 0000333333F77737777733333F07B70FFFFF3333337F337F33333333330BBB0F FFFF3333337F337F333333333307B70FFFFF33333373FF733F333333333000FF 0FFF3333333777337FF3333333333FF000FF33FFFFF3333777FF300000333300 000F377777F33377777F30EEE0333000000037F337F33777777730EEE0333330 00FF37F337F3333777F330EEE033333000FF37FFF7F3333777F3300000333330 00FF3777773333F77733333333333000033F33333333377773330000} NumGlyphs = 2 OnClick = SpeedSearchListClick end object EditDomName: TEdit Left = 8 Top = 6 Width = 161 Height = 24 Hint = 'enter a name eg. happyman.com then click GO' Font.Color = clBlack Font.Height = -13 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False PopupMenu = PopupMenu6 TabOrder = 0 OnChange = EditDomNameChange OnEnter = EditDomNameEnter OnKeyDown = EditDomNameKeyDown OnMouseMove = EditDomNameMouseMove end object CheckAllExt: TBitCheckBox Left = 240 Top = 6 Width = 113 Height = 17 Hint = 'Check .COM .ORG & .NET automatically' Caption = 'Check NET && ORG' Checked = True CheckedGlyph.Data = { 1E010000424D1E010000000000007600000028000000130000000E0000000100 040000000000A800000000000000000000000000000000000000000000000000 80000080000000808000800000008000800080800000C0C0C000808080000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333 333333300000888888888888833333300000F77777788777833333300000F777 77888877833333300000F77748888887833333300000F7784488788883333330 0000F774CC487788833333300000F77CC8C48778883333300000F78C888C4877 888333300000F74C8777C487888883300000F7C877777C48838888800000F777 777777CC483388800000FFFFFFFFFFF8CC483330000033333333333338C43330 0000} Font.Color = clBlack Font.Height = -11 Font.Name = 'Arial' Font.Style = [] GrayedGlyph.Data = { 1E010000424D1E010000000000007600000028000000130000000E0000000100 040000000000A800000000000000000000000000000000000000000000000000 80000080000000808000800000008000800080800000C0C0C000808080000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF0033333C438833 33333330000088888C488888833333300000F77777778877833333300000F777 7C478877833333300000F7777C478877833333300000F7777CC4888783333330 0000F77777CC4888833333300000F777777CC488833333300000F7777777CC48 883333300000FC4788777C47883333300000FC4788777C47883333300000FCC4 8887CC48833333300000FFCC444CCC888333333000003333CCCC888333333330 0000} ParentFont = False State = cbChecked TabOrder = 1 TabStop = True UncheckedGlyph.Data = { 1E010000424D1E010000000000007600000028000000130000000E0000000100 040000000000A800000000000000000000000000000000000000000000000000 80000080000000808000800000008000800080800000C0C0C000808080000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333 333333300000888888888888833333300000F77777777777833333300000F777 77777777833333300000F77777777777833333300000F7777777777783333330 0000F77777777777833333300000F77777777777833333300000F77777777777 833333300000F77777777777833333300000F77777777777833333300000F777 77777777833333300000FFFFFFFFFFFF83333330000033333333333333333330 0000} OnClick = CheckAllExtClick end end object PageControl2: TPageControl Left = 256 Top = 64 Width = 129 Height = 41 ActivePage = TabSheet9 TabOrder = 4 Visible = False object TabSheet9: TTabSheet Caption = 'TabSheet9' TabVisible = False object Image1: TImage Left = 0 Top = 0 Width = 121 Height = 31 Align = alClient Picture.Data = {<image004.bmp>} Stretch = True end end object TabSheet10: TTabSheet Caption = 'TabSheet10' TabVisible = False object Shape1: TShape Left = 0 Top = 0 Width = 345 Height = 81 OnMouseDown = Shape1MouseDown OnMouseMove = Shape1MouseMove end object Image2: TImage Left = 7 Top = 5 Width = 330 Height = 70 OnMouseDown = Shape1MouseDown end object Labeladv2: TLabel Left = 255 Top = 32 Width = 50 Height = 13 Caption = 'Labeladv2' Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False Transparent = True Visible = False OnMouseDown = Shape1MouseDown end object LabelAdv1: TLabel Left = 254 Top = 40 Width = 52 Height = 14 Caption = 'LabelAdv1' Transparent = True Visible = False OnMouseDown = Shape1MouseDown end end end object Timer1: TTimer Enabled = False Interval = 30000 OnTimer = Timer1Timer Left = 332 Top = 56 end object PopupMenu1: TPopupMenu Left = 28 Top = 192 object Delete1: TMenuItem Caption = 'Delete' ShortCut = 0 OnClick = Delete1Click end end object PopupMenu2: TPopupMenu Left = 412 Top = 32 object Delete2: TMenuItem Caption = 'Delete' ShortCut = 0 OnClick = Delete2Click end object N3: TMenuItem Caption = '-' ShortCut = 0 end object Detail1: TMenuItem Caption = 'Owner Detail' ShortCut = 0 OnClick = Detail1Click end object BrowserWebsite1: TMenuItem Caption = 'Browser Website' ShortCut = 0 OnClick = BrowserWebsite1Click end end object PopupMenu3: TPopupMenu Left = 124 Top = 192 object Delete3: TMenuItem Caption = 'Delete' ShortCut = 0 OnClick = Delete3Click end object Clear3: TMenuItem Caption = 'Delete All' ShortCut = 0 OnClick = Clear3Click end object N2: TMenuItem Caption = '-' ShortCut = 0 end object Print3: TMenuItem Caption = 'Print' ShortCut = 0 OnClick = Print1Click end end object Finger1: TFinger TimeOut = 25 Left = 496 Top = 32 end object MainMenu2: TMainMenu Left = 96 Top = 256 object Help2: TMenuItem Caption = ' File' ShortCut = 0 object ABOUT2: TMenuItem Caption = 'About DomainPro' ShortCut = 0 OnClick = About1Click end object RegisterWhoisFaster1: TMenuItem Caption = 'Register DomainPro' ShortCut = 0 Visible = False OnClick = RegisterWhoisFaster1Click end object News1: TMenuItem Caption = 'http://www.JustDomain.com' ShortCut = 0 OnClick = News1Click end object N1: TMenuItem Caption = '-' ShortCut = 0 end object Hide2: TMenuItem Caption = 'Hide' ShortCut = 115 OnClick = SpeedButton16Click end object Exit1: TMenuItem Caption = 'E&xit' ShortCut = 0 OnClick = Exit1Click end end object DEMO1: TMenuItem Caption = 'Demonstration' ShortCut = 0 Visible = False object SimpleSearch1: TMenuItem Caption = 'Search by Domain Name' ShortCut = 0 OnClick = FindaDomainName1Click end object CompanySearch1: TMenuItem Caption = 'Search by Company Name' ShortCut = 0 OnClick = buttonsearchClick end end object FAQ1: TMenuItem Caption = 'FAQ' ShortCut = 0 object Noresponseforalongtime1: TMenuItem Caption = 'Why Search does not respond ?' ShortCut = 0 OnClick = Noresponseforalongtime1Click end object moreFAQ1: TMenuItem Caption = 'more FAQ fron JustDomain.com' ShortCut = 0 OnClick = moreFAQ1Click end end end object PopupMenu5: TPopupMenu Left = 388 Top = 58 object Print1: TMenuItem Caption = 'Print' ShortCut = 0 OnClick = Print1Click end end object PrinterSetupDialog1: TPrinterSetupDialog Left = 256 Top = 56 end object PrintDialog1: TPrintDialog Left = 524 Top = 42 end object PopupMenu6: TPopupMenu Left = 264 Top = 24 object DisableVerification1: TMenuItem Caption = 'Disable Verification' ShortCut = 0 OnClick = DisableVerification1Click end object DisableAutoRecheck1: TMenuItem Caption = 'Disable AutoRecheck' ShortCut = 0 OnClick = DisableAutoRecheck1Click end object DisableAutoaddDOBefore1: TMenuItem Caption = 'Disable Autoadd DO Before' ShortCut = 0 OnClick = DisableAutoaddDOBefore1Click end end object OpenDialog1: TOpenDialog FileEditStyle = fsEdit FileName = 'sample.txt' Filter = 'Text File(*.txt)|*.txt|Any File (*.*)|*.*' Options = [ofNoChangeDir] Title = 'Open Search List' Left = 276 Top = 42 end object PopupMenu4: TPopupMenu Left = 248 Top = 266 end object Reg: TRegAppConfig RootKey = rhMachine Company = 'InterNIX' ApplicationName = 'WhoisFaster' Version = 'v1.0f' Active = False Left = 360 Top = 56 end object Timer2: TTimer Enabled = False Interval = 5000 OnTimer = Timer2Timer Left = 432 Top = 48 end object Timer3: TTimer Enabled = False Interval = 400 OnTimer = Timer3Timer Left = 400 Top = 24 end object OpenDialog2: TOpenDialog FileEditStyle = fsEdit Options = [ofNoChangeDir] Title = 'Open mail-box with InterNIC'#39's e-mails' Left = 556 Top = 22 end object PopupMenu7: TPopupMenu Left = 432 Top = 24 object Show1: TMenuItem Caption = 'Restore' ShortCut = 0 OnClick = Show1Click end object Hide1: TMenuItem Caption = 'Hide' ShortCut = 0 OnClick = SpeedButton16Click end object Close1: TMenuItem Caption = 'Close' ShortCut = 0 OnClick = Close1Click end end object NoTask1: TNoTask HideForm = False Left = 476 Top = 22 end object DdeClientConv1: TDdeClientConv Left = 308 Top = 22 end object TBNArea1: TTBNArea Icon.Data = {<image005.ico>} PopupMenuL = PopupMenu7 PopupMenuR = PopupMenu7 Tip = 'DomainPro 1.0' Copyright = '∩┐╜ R. N∩┐╜gele 1997' Left = 352 Top = 26 end object Timer4: TTimer Enabled = False OnTimer = Timer4Timer Left = 388 Top = 26 end object Message1: TmsMessage ContentType = 'text/plain' ReturnReceipt = False Left = 296 Top = 64 end object SMTP1: TmsSMTP WinsockLoaded = True DefaultPort = 25 OnOpen = SMTP1Open MailMessage = Message1 OnPrepare = SMTP1Prepare OnSending = SMTP1Sending OnMailSent = SMTP1MailSent Left = 240 Top = 64 end object Ping1: TPing Timeout = 5000 Left = 68 Top = 130 end end